流程图：

‘记忆柱的任何一个传入事件都是在智能软件周期兴奋的背景下的传入。在一个周期兴奋内一个记忆柱可有多个兴奋传入，每个兴奋传入都会易化或者抑制这个记忆柱，并可能兴奋这个记忆柱，兴奋后的记忆柱记入相应展示框中。这个sub的作用就是计算在一兴奋周期内，一个记忆柱的传入兴奋是如何易化抑制兴奋这个记忆柱的。

'不管什么类型的传入，信息传入后所产生的过程是相似的。

'传入刺激的类型，传到突触、其它（奖惩、强度等等），记忆柱分为易兴奋的、不易兴奋的。参数：传入刺激的强度（突触是计算强度）xfqdrecordnumber，被传入对象的标志xfrecordnumber，被传入对象易化到什么程度兴奋jyzxfqdlabel，被传入对象兴奋后应记入的展示框zsk。 流程图。

‘Sub cjcr，它计算的是：传入记忆柱的兴奋，所带来的事件。

Sub cjcr(byref  qlabelrecordnumber,xfrecordnumber, xfqdrecordnumber, zqtime, qzqtime,label，jyzxfqdlabel,zsk)  ‘xfqdrecordnumber表示传入兴奋的强度。jyzxfqdlabel表示这个记忆柱在被易化到什么强度才兴奋。Zsk表示兴奋后记入那一展示框lct

‘主要是修改记忆柱的一些总的参数，没有兴奋后记入展示框，随后根据易与不易来记入

 jyzxftimerecordnumber=xfrecordnumber-78+67+（label-1）*3  ‘记忆柱被易化的时间，但不一定被兴奋

 qjyzxftimerecordnumber=xfrecordnumber-78+67+abs(label-2) *3

 jyzxfqdrecordnumber= xfrecordnumber-78+67+（label-1）*3+2

 qjyzxfqdrecordnumber= xfrecordnumber-78+67+ abs(label-2)*3+2

 xfjyzxftimerecordnumber= xfrecordnumber-78+73+( label-1）’记忆柱被兴奋的时间

 qxfjyzxftimerecordnumber= xfrecordnumber-78+73+ abs(label-2)

 get 8, qjyzxftimerecordnumber, qjyzxftime ‘

 get 8, jyzxftimerecordnumber, jyzxftime ‘jyzxftime记忆柱易化的时间

 get 8, jyzxfqdrecordnumber,jyzxfqd ‘jyzxfqd记忆柱易化的强度

 get 8, qjyzxfqdrecordnumber,qjyzxfqd ‘记忆柱易化的强度

 get 8, xfjyzxftimerecordnumber, zjyzxftime  ‘zjyzxftime表示记忆柱被兴奋的时间

 get 8, qxfjyzxftimerecordnumber, qzjyzxftime  ‘qzjyzxftime表示记忆柱被兴奋的时间

‘记忆柱被易化时易化时有两种情况，一种是才开始易化，一种是已经易化过。还有被兴奋过与没有被兴奋过，没有被兴奋过时，这次易化可能带来兴奋也可能不带来兴奋。

 if jyzxftime<zqtime then ‘本兴奋周期，这一记忆柱还没有被易化过。

  if qzjyzxftime =qzqtime then ‘前一兴奋周期它兴奋过。

   Jyzxfqd= xfqdrecordnumber+qjyzxfqd/2

   Jyzxftime= zqtime

end if

if qjyzxftime<qzqtime then ‘前一兴奋周期它没有兴奋。

   Jyzxfqd= xfqdrecordnumber

   Jyzxftime= zqtime

end if

put 8, jyzxftimerecordnumber, jyzxftime

put 8, jyzxfqdrecordnumber,jyzxfqd

end if

 if jyzxftime =zqtime then ‘这种情况下，这一刻这个记忆柱的传入易化不是第一次。

   jyzxfqd=xfqdrecordnumber+jyzxfqd

   put 8, jyzxfqdrecordnumber, jyzxfqd

 end if  ‘jyzxftime =zqtime

‘记忆柱没有记录入过展示框的情况。（需要专门的sub）

get 8, xfjyzxftimerecordnumber, zjyzxftime

if zjyzxftime<zqtime and jyzxfqd>jyzxfqdlabel then ‘分易兴奋的与不易兴奋的记忆柱。

call jrzsk(zsk, qlabelrecordnumber,xfrecordnumber)

end if

  put 8, xfjyzxftimerecordnumber, zqtime

end if

End sub